COMPUTER INTERFACE 




USARE IL PROGETTO 
PRESENTATO IN MARZO 
ANCHE CON IL SINCLAIR 

di PIERO TODOROV1CH 


R iprendiamo il discorso del¬ 
l’artìcolo «Computer Soun- 
ifiight» (marzo ’85) sulla realiz- 
azione di effetti luce con il com¬ 
puter, presentando l'interfaccia 
per lo S peci rum che consentirà 
wchc agli users di tale macchina 
di generare ogni sorta di effetti. 
Come già precedentemente di¬ 
scusso, un computer può dare 
molto di più dei comuni genera¬ 
tori logici o analogici in com¬ 
mercio poiché tramite program* 
©azione c possibile superare le 
imitazioni circuitali che rendono 


totalmente anelastico il funzio¬ 
namento degli stessi c limitare il 
lavoro del tecnico allo stretto 
indispensabile. 

Infatti non occorrono più mil* 
le differenti circuiti per generare 
altrettanti effetti, ma un solo 
progetto, il computer, c i pro¬ 
gram m L 

Teoricamente un computer di¬ 
spone al suo interno di tutti i 
componenti che finora si sono 
usati singolarmente: contatori, 
porle logiche, shift register, tem* 
porizzatorì ecc t con la differenza 


che è possibile utilizzarli con un 
programma invece che con le 
connessioni definitive di un cir¬ 
cuito stampato. 

[/hardware che vi proponiamo 
ha solo lo scopo di decodificare ì 
segnali in uscita dai bus del pro¬ 
cessore e permettere il pilotaggio 
dei carichi; il vero progetto, che 
permette il funzionamento come 
unità di effetti, è costituito dal 
software fornito in queste pa¬ 
gine. 

Ogni altra utilizzazione è po¬ 
tenzialmente disponibile purché 
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schema 
e montaggio 


Schema elettrico delF interfaccia per abbi¬ 
nare l’unità di potenza per luci psichedeliche 
computerizzate (vedi marzo ’85) allo Spec¬ 
imen. La basetta è disponìbile a lire 5000 
(pagabili solo con vaglia postale ordinarla), 
fi kit deU interbaccia con la cassetta di pro¬ 
grammi costa hre 30.000. 


venga scritto il programma adat- Per le note tecniche riguardati- dovuto impiegare, in aggiunta ai 
to; in tal modo questa unità può ti tale circuito vi rimandiamo buffer invertenti, otto fltp flopD, 
trasformarsi in timer, in unità di quindi alia rivista di marzo oc- nonché un semplice sistema di 
controllo dì processo ecc, senza capandoci in questa sede solo di decodifica per abilitare il tutto, 
effettuarvi alcuna modifica. ciò che riguarda il primo circuito quando richiesto. 

IL circuito elettrico si compone che permette allo Spectrum la go Precisamente gli otto flip fk p 
di due parti: la prima collegata al sttone delf unità di potenza. contenuti in U1 memorizzano la 

connettore di espansione dello A differenza della Corri modo- condizione degli 8 bit del bus dei 
Spectrum è descritta in queste re, la Sinclair non ha ritenuto dati se sono con temporanea me n- 
pagìne, la seconda, che si occupa opportuno dotare i suoi compu- te attivi i terminali WR, lORQc 
del pilotaggio dei carichi dì pò- ter di una uscita parallela pur À7. 1 

lenza, è già stata presentala as- molto utile per pilotare stampali- Questa condizione è verificata 
sieme alf interfaccia che ne per- ti, I/O esterni ecc, e ciò ha reso quando si esegue ristnizionc 
metteva la gestione con il V1C più difficile la realizzazione del- OUT 127,X e alf uscita delfinte- 
20. l'interfaccia* À tale scopo si è grato ritroveremo memorizzali 
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gli otto bit del dato «X». 

Con soli tre circuiti integrati e 
un transistor abbiamo già a di¬ 
sposizione un mezzo per gestire 
otto canali, anche se la corrente 
in uscita è appena sufficiente al 
carico di un led. 

Il compito delle prime 7 uscite 
è quello di pilotare i fotoaccop¬ 
piatori presenti sullo stadio di 
potenza, mentre V ultima, corri- 
spendente all’ottavo bit del dato, 
è utilizzata per accendere un led 
di ausilio adoperatone. 

La realizzazione pratica non 


presenta difficoltà e può essere 
intrapresa da chiunque sappia 
usare il saldatore; molta atten¬ 
zione deve essere invece prestata 
al circuito stampato che, pur rea¬ 
lizzabile con le tecniche più sem¬ 
plici, presenta una notevole fila¬ 
tura. Per il montaggio dei com¬ 
ponenti fare riferimento allo 
schema pratico riportato, si con¬ 
siglia vivamente di usare zoccoli 
per gli integrati e di controllare il 
tutto prima dì collegare il com¬ 
puter. 

Il connettore di collegamento 


con lo Spectrum potrà essere il 
solito 28+28 poli con la chiave al 
quinto contatto da sinistra o un 
più economico 19+19 polì con 
chiave al terzo contatto. 

In quest'ultimo caso il circuito 
è anche compatibile col bus dello 
ZX 81, però è probabile che, per 
un corretto funzionamento con 
questo computer, sia necessario 
cambiare la mappatura, oltreché 
rifare totalmente la parte riguar¬ 
dante il software. 

Il collaudo finale va fatto col¬ 
legando (a computer spento) l'ìn- 
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PER LA GESTIONE 
DELL’INTERFACCIA 


IO REM 

a® REM SPECTRUM SOUNDLIGMT 
3® rem di Piero Todcrovìch 
<1® REM 

50 BORDER 1: PRPER 1: INK 7: C 
LEAR iPEEK 23675+256+PEEK 23676- 
102j: PRINT AT 10,11;"ATTENDERE“ 
60 LET Start =PEEK 23675 +256 + PE 
EK 23676-101 

70 RANDOMIZE Start+65 
60 LET l=PEEK 23670: LET Hi =PEE 
K 23671 

20 RftNDOMIZE Start+37 
100 LET n=PE£K 23670; LET P oPEE 
K 23671 

110 RESTORE i POR a«Start TQ St 
art+100: READ b: POKE a,b: NEXT 

° 120 DATA 42,85,92,22,123,35,35, 
35,35,126.25 4,234,192,205,l, fti ,35 
,205,n,p,211,127,205,n,p,198,64, 
130,211,127,62,128,170,87,35,24, 
224,175,6,6,245.126,254,48,14,0, 
40,6,254,49,32,10,14,32,241,203, 
15,129,35,16,235,201,241,241,201 
,58,4,91,254,0,40,5,71,118,16,26 


3,201,175,1,120,92,2,6,10.58,120 
,92,254,50,208.219.254,203,119,3 
2,242.16 .248,lia,ll8,2Ó1 
130 BEEP 0.5,10: SEEP 0.3,16; C 
L5 

140 REM reset Luci 
150 POKE 23300,1 
160 RmnDQMIZE USR start 
170 REM 000000000000 
130 PRINT AT 6,li; "PREMI :“ " " 
"1 luci sequenziali tempo rissati 

.8 tu ci psicomusi ca li ” 

190 PAUSE 20 : PAUSE 0: CL5 
200 3F INKEY$ = “1" THEN INPUT "t 
efiipo? < 1 -255) : ; a : PQKE 2330®,a 

i30 TO 230 

21® IF INKEYS=“2" THEN POKE 233 
00,®. PRINT hT 5,0;"USARE LP PR£ 
Sfi EfiR COME INGRESSO";AT 7,10;"O 
EI SEGNALI": GO TQ 23® 

220 30 TO 13® 

230 PRINT RT 11,11; FLPSI 
K g; PAPER 6; BRIGMT 1, "E| 

PiS" 

240 PRINT AT 20,0;"PREMI 'ù' PE 

R TERMINARE .( l'effetto non e' 

i m in e d i a t o ì " 



25® rem luci rotanti a destra 

26® fùr a = 1 TO 20 

270 RANDOMIZE USR Start 

280 REM 100100100100 

230 REM 010010010010 

300 REM 001001001001 


I U3AB£ 


Ljh PCESrt EAP COHE 1NG*E*S0 
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// segnate di bassa frequenza per la 
generazione degli impulsi psichedelici 
si applica alla porta EAR del 
computer . // software di gestione 
prevede la visualizzazione dei 
messaggi operativi Qui sopra un 
esempio pratico* 


terfaccia ai bus e dando tensione* 
Se Io Spectrum si comporta 
come di norma quasi certamente 
limo funziona alla perfezione, al¬ 
trimenti c probabile che abbiale 
creato corto circuiti tra le piste 
con qualche remota probabilità 
di danneggiare il computer* Il 
comando diretto GUI 127*255 
dovrebbe provocare l'accensione 
del led e uno stato logico basso 
sui sette terminali d’uscita; veri- 
fica re che out 127,0 causi lo stato 
oppo*sto* Per chiarire meglio il 
funzionamento è possibile colle- 
gare provvisoriamente un led ad 
ogni uscita con i catodi uniti in¬ 
sieme al terminale 0* Con OUT 
127,BIN 01010101 o altra se¬ 


quenza è possibile azionare sin¬ 
golarmente i vari led; notare in' 
oltre razione invertente dei buf* 
fer d'uscita, complementare a 
quella dei fotoaccoppiatori del¬ 
l’unità di potenza. 

Una volta sicuri de! Teilicenza 
del circuito è possibile passare al 
montaggio del progetto riguar¬ 
dante la sezione di potenza, già 
descritta e al collegamento. À ta¬ 
le scopri si può usare una piattina 
ad otto poli lunga quanto richie¬ 
sto che unisca i terminali da 0 a 7 
delPinterfaecia Spectrum con 
quelli omologhi dello stampato 
alla sezione di potenza; il collau¬ 
do finale è molto semplice e può 
essere fatto anche senza collegare 
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IL DISASSEMBLATO 


6060 


GóiO 

ORO 

28$$$ 

606® 

2AS55C 


LO 

hl, ta363?;i 

6063 

1600 

003$ 

LO 

0,0 

6065 

23 

004$ START 

INC 

HL 

6066 

23 


INC 

HL 

6067 

23 

006$ 

INC 

HL 

606S 

23 

007$ 

INC 

HL 

6069 

7E 

M8Ù 

LO 

A, dIL) 

60ÓA 

FEEA 

0Ù9Ù 

CP 

234 

606C 

C® 

01$$ 

REI 

NZ 

6060 

CORI60 

0110 

GALL¬ 

WAIT 

607tì 

23 

012$ 

INO 

HL 

6071 

CO3560 

8130 

CALL 

corau 

6074 

D37F 

0140 

OUT 

►- 

ro 

"k. 

6076 

CD8560 

0150 

CALL 

C0NU 


6079 

C64® 

9160 


A 00 

64 

6076 

82 

0170 


A0D 

0 

6D7C 

D37F 

0180 


OUT 

1127),A 

6D7E 

3E8® 

0190 


LO 

A, 128 

6D80 

AA 

0290 


XOR 

0 

6D81 

57 

0210 


LO 

0,A 

6DS2 

23 

022® 


INO 

HL 

6D83 

1S£0 

0230 


JR 

START 

6085 

AF 

0240 

C0NU 

XOR 

A 

6086 

0606 

0250 


LO 

EL 6 

6083 

F5 

0260 

01 

PU3H 

AF 

6089 

7E 

0270 


LO 

A,(HL) 

6 OSA 

FE3w 

0230 


CP 

4S 

6030 

0E0S 

0290 


LO 

c,o 

6D8E 

2306 

0300 


JR 

Z, UAI 

6D90 

FE31 

031® 


CP 

49 

6092 

200A 

032® 


JR 

NZ.FINE 

6 0 94 

0520 

033® 


LO 

C, 32 

6096 

FI 

034® 

UAI 

POP 

AF 

6097 

CB0F 

0350 


RRC , 

A 
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310 NEXT a 

320 IF PEEK 23560=113 THEN GO T 
0 130 

330 REM passaggio 
340 RRNOOMIZE U5R start 
350 REM 101101101101 
360 REM 111111111111 
370 REM 000000000000 
380 REM 111111111111 
390 REM 000000000000 
400 IF PEEK 23560=113 THEN 60 T 
0 130 

410 REM luci rotanti a sinistra 

420 POR 3*1 TO 20 

430 RRNDOMIZE U5R Start 

440 REM 010010010010 

450 REM 100100100100 

460 REM 001001001001 

470 NEXT a 

480 IF PEEK 23560*113 THEN GO T 
0 130 

490 REM passaggio 

500 RRNOOMIZE USft start 

510 REM 010010010010 

520 REM 100100100100 

530 REM 101001001000 

540 REM 110010010000 

550 REM 110100100000 

560 REM 111001000000 

570 REM 111010000000 

580 REM 111100000000 

590 REM 111000000000 

600 XF PEEK 23560=113 THEN GO T 


0 130 

610 rem ping ponq 

620 FOR è=l TO 5' 

630 RRNOOMIZE USR Start 
640 REM 011100000000 
550 REM 000111000000 
660 REM 000001110000 
670 REM 000000011100 
680 REM 000000000111 
690 REM 000000001110 
700 REM 000000111000 
710 REM 000011100000 
720 REM 001110000000 
730 REM 111000000000 
740 NEXT a 

750 IF PEEK 23560*113 THEN GO T 
0 130 


760 REM passaggio 
770 FOR a*l TO 5 

780 rhndomize usr start 

790 REM 0111000000O0 
800 REM 000011100000 
310 REM 000000011100 
820 REM 100000000011 
830 NEXT a 

840 RRNDOMIZE USR Start 
350 REM 011100000000 
860 REM 000001110000 
870 REM 100100100100 
380 REM 111111111111 
890 REM 000000000000 
900 REM 111111111111 
910 GO TO 250 


II software offre una duplici’ 
possibilità di effetti luminosi, li 
monitor a /ed posto sul pannello 
frontale dell'unità dì potenza 
permette di avere una immediata idea 
della sequenza di lavoro 
programmata tramite computer. 


Ic lampade in modo simile a co¬ 
me già descritto. 

Per maggiore chiarezza rive¬ 
diamo brevemente come si con¬ 
trollano le 12 uscite; il bit 7 del 
dato inviato con ti comando di 
OUT seleziona alternativamente 
i primi sei o i successivi sei canali, 
il cui stato on/ofT è deciso dai bit 
0 - 6 . 

Quando il bit 7 passa da 1 a 0 
si programma lo stato dei canali 
da uno a sei. viceversa quello de¬ 
gli altri. 

Con due comandi QU I si rea¬ 
lizza quindi il controllo dei cari¬ 
chi c grazie all*ultimissima fun¬ 
zione BIN fornita dall’interprete 
Basic dello Spectrum è possibile 


lavorare sui singoli bit in modo 
molto più semplice che con gli al¬ 
tri computer. Con QLIT 127,BIN 
00000000 e OlJ'l 127.BIN 
01000000 si ottiene il reset delle 
uscite, con OUT 127,BIN 
001 1 l 1 1 1 e OUT 127,BIN 
01111111 lo staio opposto. 

A questo punto ricordo che 
l'ottavo bit del dato, lasciato fi¬ 
nora in disparte, comanda il led 
presente sull’interfaccia, utilizza¬ 
to come monitor nei programmi 
presentati. 

Per permettere al computer di 
elaborare segnali musicali, con¬ 
dizione indispensabile nella ge¬ 
nerazione di effetti, non si è do¬ 
vuto impiegare alcun componen- 







6099 

31 

<3366 


A0D 

C 

6 D£9 

D0 

0560 

RET 

NC 

6D9A 

23 

0370 


INC 

NL 

6 DBA 

D8FE 

0570 Al 

IN 

A,(254) 

6698 

10EB 

0380 


DJNZ 

Cl 

6D6C 

CB77 

0560 

BIT 

6zA 

6696 

CQ 

0390 


RET 


6DBE 

20F2 

0590 

JR 

NZ A0 

6D9E 

FI 

0400 

FINE 

POP 

AF 

6DC0 

10F6 

0600 

DJNZ 

Al 

669F 

Fi 

0410 


POP 

AF 

6DC2 

76 

0610 

HALT 


6DAÓ 

C9 

0420 


R£T 


6DC3 

76 

0620 

HALT 


66A1 

3A0456 

0430 

WAIT 

LO 

A,(23300) 

6DC4 

C9 

0630 

RET 


6664 

FE0Q 

0440 


CP 

0 



0640 

END 


66 A6 

2805 

0450 


JR 

Z,AUDIO 

Al 

6 DBA 




66A3 

47 

0460 


LD 

6, A 

Jn * 

Mtl 

fiD6? 




66A9 

76 

0470 

NI 

HALT 


AUDIO 6DAD 




66AA 

10FD 

0430 


ÙJHZ 

NI 

NI 

60A9 




66AC 

09 

0490 


PET 


WAIT 

6DA1 

T M m. 



6 6 AD 

A F 

0500 

AUDIO 

XQR 

A 

FINE 

609E 

1 jOcs^ioui 



6DA£ 

01785C 

0510 


LD 

6C , 23672 

Uni 

6096 

di partenza n>utmes 

6661 

02 

0520 


LO 

i6Ci,A 

Cl 

6D38 




6662 

060A 

0530 

Aù 

LD 

6,10 

C0NU 

6D85 




6664 

3A78SC 

0540 


LD 

A,C236721 

STARI 

' 6D65 




6667 

FE32 

0550 


CP 

5d 

tt 

5DCE 
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GESTIONE LUCI 


10 REM 

£0 REM 5PECTRUM 5.LIGHT 2 
30 REM di Piero Todo roviCh 
* 40 REM 

50 BOROEft 1: PAPER i: INK 7; C 
UEhR pìPEEK 23675 + 256 +PEEK. 23676- 
61); PRINT AT 10,11 : "ATTENDERE" 
60 DIM a$ (12); LEt st^rt^PEEK 
23675 + 256+PEEK. 23676-60 
70 RhNDOMIZE start+32 
SO LET l =PEEK 23670: LET Ut =PEE 
K 23671 

90 RhNDOMIZE start+33 

10O LET nsPEEK 23670; LET P=PEE 
K 33671 

110 RESTORE ; POR a=start TO St 
art+60: READ b: POKE a,b; NEXT a 
ldO DATH 4^ , / 5 ,■ y c! t o5 , 35 i 35 , 35 , 3 
5 * 35 , 205 i fi / P . 4 11, 127 , 205 , ri ■ P , 33 , 
l , Im , 193,64,134 .SII, 127 , 62,126,17 
4 j SO , L , n't . 2Ó1,128 , 175,6,6 , 245,126 
,£54,48,14 , 0 ,40 , 6,254,49,32,10,1 
4,32,241.203,15,129,35,16,235,20 
1,241,241,201 
140 REM reset Luci 
ISO LET a *="000000000000" 

160 RHNDOMIZE USR Start 

170 CL5 : PRINT hT 6,111 "PREMI 

;."1 per L'effetto vu-meter" 

''”2 per cottando diretto delle i 
u c ì " 

ISO PAUSE O: IF INKEY$=”1" THEN 
: CL5 : PRINT hT 10,0; "USARE LA 


PRESA EAR COME INGRESSO":AT 12, 
IO;“DEI SEGNALI": PRINT 00; “'w 
PER TERMINARE": GO TO 30O 
190 IF INKEYS="2" THEN GO TO 40 

0 

200 GO TO 170 
210 REM 

30O REM * +UU-METER * * 

310 6EEP 0.5,10: LET bsIN 254; 

rem valore ietto in assenza di 
segnate e senza premere alcun 
tasto 

320 LET a=13 
330 LET a=a-ìa>l! 

340 LET ai(a)s"r: IF a <12 THEN 
LET a$(a+iis"0" 

350 RANOOMIZE USR start 

360 LET S=a+((IN 254 Ob) AND (4 

370 ÌF*INKEY$<>"q" THEN GO TO 3 

•ù 0 

380 GO TO 140 
3yO REM 

40O REM * ^COMANDO LUCI#* 

410 POKE 23656,0: REM Minuscole 
420 QL5 : LET a %- 11 000000000000" 
430 PRINT AT 11,10 ; M t1111ttfftt 
t";RT E,6, FLASH 1,“5PECTRUM LIG 
MT CONTROL 1 ' 

44C PRINT AT 12 , 10;"RBCOEFGHXJK 
L M : PRINT tt0 ; " ^ 0 ' PER TERMINARE" 
450 PRINT hT 10,10;a $ 

460 PAUSE 0; LET b=CÙDE INKEY$- 
96: IF INKEY$=”q° THEN GQ TO 140 
470 IF £ b < 1 ) OR t b > 12 J THEN GO 
TO 460 

480 LET a$£b)=:5TR$ NOT URL è$ib 
ì : RhNDOMIZE USR Start 
490 GO TO 450 



te aggiuntivo; esiste già Fingresso 
adatto nella presa che utilizzate 
comunemente per caricare i pro¬ 
grammi da registrare (EAR). La 
presenza del segnale in ingresso è 
controllabile con il coniando IN 
254 il cui bit 6 muta di stato. 

Dopo La parte pratica del pro¬ 
getto e le noie sul funzionamento 
vediamo ora in dettaglio j pro¬ 
grammi che consentono di otte¬ 


nere effetti con lo Spectrum ai 
quali è stata dedicata altrettanta 
cura che nelFhardware. 

Benché sia possibile controlla¬ 
re il circuito con semplici pro¬ 
grammi in Basic, come si è fatto 
per il VIC 20, abbiamo preferito 
scrivere due routines in linguag¬ 
gio macchina per ottenere il mas¬ 
simo della velocità e per sempli¬ 
ficare la programmazione. 


La prima routine legge gli sta¬ 
tement REM successivi alla linea 
di chiamata e provvede al pilo¬ 
taggio dell'interfaccia interpre¬ 
tando una serie di caratteri 0 e I 
rappresentanti lo stato dei dodici 
canali, La routine provvede inni 
tre a generare sia un ritardo fisso 
tra sequenze successive, che di¬ 
pendente dal segnale inviato alla 
presa EAR, potando alla loca* 


SO 








IL DISASSEMBLATO 


6 D 60 

0010 

ORO 

23 O 00 

6 E >60 2 A 4 B 5 C 

0020 

LO 

HL, i: 23627 j 

6053 23 

0030 

INC 

HL 

6064 £3 

0040 

INC 

ml 

5 D 65 2 3 

□050 

INC 

HL 

6066 23 

0060 

INC 

HL 

6087 23 

0070 

INC 

HL 

6068 23 

0030 

INC 

HL 

6069 CD 8160 

0990 

CALL 

CONM 

8060 037 F 

0100 

□UT 

( 12 ?).A 

6 D 6 E CD 816 D 

01 10 

CALL 

CONO 

6071 218060 

0114 

LO 

HL. 03 C 

6074 0640 

0120 

ADO 

64 

6075 36 

0130 

ADD 

ÌHL) 

6077 037 F 

0140 

OUT 

( 127 ),A 

6079 3 E m 

0150 

LO 

A, 123 

6 D 7 B AE 

0160 

X 0 R 

(HL) 

6 D 7 C 328060 

0170 

LO 

( 030 , A 

607 F 09 

0130 

RET 


6080 30 

0185 03 C 

DEF 6 

123 

6061 AF 

0190 CONM 

X 0 R 

Jk 

« 

6082 0606 

O 2 O 0 

LO 

6,6 

6 D 84 FS 

0210 CI 

PU 5 H 

AF 

6085 7 E 

0220 

LD 

A, IHL) 

6086 FE 3 Ù 

0230 

CP 

48 

6038 0 EO 0 

0240 

LO 

c,o 

6066 2306 

0250 

JR 

z, ma r 

608 C FE 31 

0260 

CP 

49 

6 D 3 E 200 A 

0270 

jR 

NZ,FINE 

6 D 90 0 E 2 & 

0280 

LO 

C - 32 

6092 FI 

0290 MAI 

POP 

AF 

6093 CB 0 F 

0300 

RRC 

A 

6095 31 

0310 

ADO 

C 

6096 23 

0320 

INC 

HL 

6097 10 E 6 

0330 

DJNZ 

CI 


6099 

09 

0340 

RET 

6 D 9 A 

Fi 

0350 FINE 

POP AF 

6096 

FI 

0360 

POP AF 

6 D 9 C 

C 9 

O 370 

RET 



0380 

END 

fine 

609 A 



MAI 

6092 

— Locazioni 


CI 

6084 


CONU 

6031 

dì partenza roulines 

ose 

6030 



a 

5 DCE 




Infoio, i! prototipo dell* unità dì potenza 
{marzo SS), Sotto , munii orinazione delio 
stato dì ciascuna uscita dei generatore 
psichedelico e menu operativo a disposizione 

deli'utente. 
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zione 23330 il tempo (intervallo 
1-255) oppure il valore 0, 

Il primo listato Basic provvede 
a caricare e rilocare i 101 bytes 
del programma LM adattandosi 
alla configurazione l6/4£k del 
vostro Spectrum e a dimostrare 
con due semplici opzioni c alcune 
sequenze il funzionamento della 
routine. 

Come noterete, dopo le chia¬ 


mate USR l’esecuzione passa nel¬ 
le mani del linguaggio macchina 
e si ha il ritorno al Basic al ter¬ 
mine delle linee REM o in caso di 
sequenze errate, 

E possibile sia una esecuzione 
totalmente affidata al LM, con 
una 3unga sfilza di lince REM e 
poche chiamate l'SR, che una 
mista al Basic con cidi di ripeti¬ 
zione e variazioni del tempo. 

Questo programma è ideale 
per una insegna luminosa o per 
vivacizzare una discoteca con ef¬ 
fetti legati alla musica; in tal ca¬ 
so, con il cavetto in dotazione o 
costruito secondo le esigenze, 
prelevare dal mixer o da altra 
uscita a basso livello il segnale da 
immettere nella presa EAR, 

Per ottenere buoni effetti è ne¬ 
cessario regolare l’intensità del 
segnale al livello più adatto; il led 
dcirinterfaccia serve di aiuto per 
tale operazione. 

Il secondo listato Basic che vi 
presentiamo, carica un’altra ruo¬ 
tine in linguaggio macchina e 
consente di scrivere la sequenza 
di comando delle luci in una va¬ 
riabile stringa anziché in linee 


REM, 

Solo in questo modo è possibi¬ 
le realizzare effetti per i quali è 
necessario modificare alfinterno 
del programma il contenuto della 
sequenza, come nei due esempi 
da noi proposti di vu-meter e 
comando luci. 

Per un corretto funzionamento 
il programma deve dimensionare 
un array con; CELAR; DIM 
a$(12), assegnare ad a$ una 
stringa contenente lo stato dei 12 
canali e poi chiamare la routine 
LM. 

Un breve esame ai listati chia¬ 
rirà ogni dubbio; i più esperti 
troveranno da studiare anche i li¬ 
stati assembler delle ruotincs 
LM, alle quali potranno anche 
essere fatte migliorie o aggiunte 
utili. 

Per finire vi ricordiamo che i 
programmi Basic presentati han¬ 
no prevalentemente scopo dimo¬ 
strativo; dopo le informazioni 
date non vi saranno difficoltà a 
creare effetti personalizzati adul¬ 
ti alle vostre esigenze. 
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E cco una piccola routine di 
grande utilità per tutti i pos¬ 
sessori di Spectrum che deside¬ 
rano «mettere il naso» nei pro¬ 
grammi protetti. Vediamone il li¬ 
stato c consideriamo le opera¬ 
zioni che lo Spectrum fa ogni 
volta che si carica o si salva un 
programma. 

Ogni programma salvato è di¬ 
viso in due parti: la prima è un 
header, cioè un blocco di 17 
bytes, la seconda è il blocco di 
dati vero e proprio, L’header 
contiene informazioni utili che 
servono al computer per caricare 
in modo giusto il «corpo» se¬ 
guente. L’header è strutturato in 
questo modo: il l. byte definisce 
il tipo del programma (BASIC, 
bytes, array numerico o alfanu¬ 
merico), i bytes da 2 a 1 I conten¬ 
gono il nome del programma, il 
12. c 13, informano sulla lun¬ 
ghezza e i rimanenti sono vari 
parametri che riguardano la 
quantità usata dell’area BASIC 
piu le variabili, la linea di parten¬ 
za del BASIC, □, in caso dì bytes 
o arrays, la locazione del 1. byte 
salvato di quest 7 ultimi. 

Ora prendiamo per esempio 
un programma BASIC protetto 
che non si può caricare con 
MERGE rrrH (se non va in crash). 
Noi non vogliamo che venga ca¬ 
ricato con Tautorun, quindi ri¬ 
dea migliore sarebbe quella di 
modificare il byte apposito nel- 
fheader o di costruirne addirit¬ 
tura uno nuovo. Il programma 
pubblicato questo mese vi per¬ 
metterà di fare questo senza tan¬ 
te complicazioni. Copiatevi Tuti- 
iity del listato e salvate con SA¬ 
VE “HC" LINE IO, 

Dando RUN appariranno una 
serie di input che chiederanno: 

I) il tipo del programma (inserite 


SOR SHEET 


Header 

Constructor 


Un'utility potentissima in un listato breve breve. 
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LUNGHE!. 


BYTES 
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PREPhkh IL NASTRO E PREMI 


10 RESTOSE : POKE 20658,3: LET 
ADD-Ì5000: BOROER 4: PAPER 4: I 
NK 7. OLE 

15 POKE 23624-, 32. PRINT RT 1,1 
: " HE Pi D t. R C: 0 U 5 1 R U CT 0 K b y tri A C L □ C 


~ : 

iZL 

U 

DBF 

3 

N h.;X) 

= INT 

i X 

.*■ 

j-' 



ci 

_ i 

DEr 

p 

H L i X j 


INT 


(X/ 2 56j ; 

il* 
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POR 

B 

=45080 

T 0 

rib 3 

■i 

61 POKE 

, 0 
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+■ 

o 

a 

J -r^ 1 

i” U K 

R 

=48038 

TO 



1 : RERD 


U p 0 KE IH , U : N E XT H . 

4-8 DhTH 221,33,208,175,17,17,0 
, 175,285 194. 
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rib 

PO 

K fc.. 

.1 J 

b 0 

PRINT RT ri,, 
0l M R5i£) 

G □ b U 5 1 6 b 

lìiT ) = 

■O _| r 

IPO : " 
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P H S = 1 ' B H ' ' 

T H E N 

PRINT 

" BhS I 

I_. 

70 
Y N1J 

U— l— = 1 — t .1 

IF R$ = ,, RN" 
MERICO". LET 

THEN 

fri 

PRINT 

"hRRh 

”? cr 
■' '.j 

IF R $ = " hh' 1 

l H E N 

PRINT 

"RRRft 

'K H L 

FhNUMER ICO ,k : 

LET 

T=2 


SO 
3 1 : 

IF 

LET T = 3 

THEN 

PRINT 

"BYTE 


36 IF T = 99 THEN PRINT 00; "DRT0 
INCORRETTO"; BEEP .5,10: GO TQ 


ri 5 


98 POKE hOD.T 

9 5 PRINT RT 6,3i ”NOME: M J : DIM 
R $ Ci0 ; : GQ SUB 165 
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10© PRINT ft* FOR fi=ADD+i TO AD 
O + i©, POKE A,CODE AsiA-ADD) : NEX 

i H 

10S PRINT flT 8.3: "LUNGHEZZA BYT 
ES: *' ! . fiO SUE 165: PRINT A$; 

110 POKE ADD + 1'1 , FN L(UAL R£i: P 
□ KE ADD + 12 . FM ,~1 (URL H S ! 

115 ì_iiT i =32 ?63 

120 PRINT RT là.3;-PARTENZA BYT 
E5/LINER : ■' . 

125 GO SUB 165: IF = THEN 
LET A $ =5TR 5 S 

130 PRINT Sì POKE AOD + 'io.FN L( 
UHL ni, . PO K E Ht>D f 14 . F N H t UAL A ì 


135 IF T = 3 THEN PRINT RT 12,3; “ 
LUNGHEZZA BASIC: ": : GO SUB 16S : 
PRINT A3: POKE ADD + 15 .FN L(UAL fi 
$> POKE ADD + 16,FN H (UHL fi fil 
140 PRINT RT 13,5;"I DATI SONO 
CORRETTI ■?“ : PAUSE 0 IF INKEY$ = 
'■ N" THEN RUN 

145 PRINT RT 18,1: M PREPARA IL N 
ASTRO E PREMI ED IT" 

150 IF INKEYfi< >CHRÌ 7 THEN GO T 
O 150 

IBS LET Z=USR 40000 

160 FOR C-l TG 200: NEXT 0: RUN 

165 INPUT LINE fifi: Ir CODE 

A$=226 THEN STOP 
170 RETURN 


Ancora 

sull’interrupt 

Rispondiamo brevemente alle richieste dei lettori. 


Bà per BASIC, BY per bytes, 
ÀA per array alfanumerico ed 
ÀN per array numerico); 

2) ii nome del programma; 

3) la quantità dì bytes del pro¬ 
gramma; 

4) la prima locazione in caso di 
bytes, o la linea di partenza del 
BASIC. È qui che inserendo "S" 
al posto di un numero, verrà co- 
strutto un header senza Fau- 
torun; 

5) in caso di Basic verrà chiesta 
la lunghezza complessiva di que- 
st'uUimo più le variabili. 

Se avete dei dubbi riguardo ai 
dati, andate a verificare V header 
originale con un lettore. 

Dopodiché vi verrà chiesto se i 
dati sono corretti (rispondete con 
S o N). Ora preparate il nastro 
airinizio delPheader originale; 
premendo ED IT (CAPS SH1FT 
+ I) verrà salvato il vostro hea¬ 
der truccato. 



A proposito deir articolo «In- 
terrupt story» (febbraio 85) 
abbiamo ricevuto molte lettere; 
rispondiamo a tutti con queste 
poche righe delTautore, Alcuni 
hanno intravisto nel testo uno 
scambio di diciture a proposito 
della semplice, ma sommaria, de¬ 
scrizione dei modi dì interni pt. 

Ecco riassunti gli effetti dei tre 
modi di inicrrupi sul funziona¬ 
mento del processore Z80 tratto 
dalle note tecniche fornite dalla 
United Technologies Mostek. 
MODO 0 

Alla richiesta di interruzione, la 
C PU legge dal bus dati il codice 
di un comando di restart del tipo 
«RST n» eseguendo la chiamata 
alla subroutine di servizio posta 
in una delle n destinazioni per¬ 
messe. 
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MODO 1 

Quando questo modo è attivo, la 
CPU risponde alFinter nazione 
eseguendo una chiamata di re¬ 
start fìssa alla locazione 38H (56 
decimale) come eseguendo il co¬ 
mando RST 56. 

MODO 2 

La C PU risponde airinterrupi 



leggendo dal BUS dati un vettore 
di 8 bit mediante il quale indivi¬ 
dua l’inizio della routine di servi¬ 
zio in qualsiasi punto della 
memoria, 

Gli 8 bit forniti dairestemo 
costituiscono la parte meno si¬ 
gnificativa di un indirizzo; la par¬ 
te più significativa si trova nel- 
FaposUo registro (ì) interno allo 
Z80, che deve essere precederne’ 
mente caricato da programma. 

Con questi due bytes la CPU 
forma un indirizzo dal quale leg¬ 
gere i due bytes della locazione di 
inizio della routine da eseguire. 

Lavorando in Interrupt mode 
0 e 2 sullo Spectrum, senza un 
hardware esterno che invìi dati al 
BUS, (la ULA non se ne occupa) 
il bus stesso resta allo e perciò il 
dato letto è fisso a 255. 



